home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nothing but Tetris
/
Nothing but Tetris.iso
/
menu.lha
/
IBMPC
/
MIXED2
/
T3TRIS
/
T3MENU.BAT
< prev
next >
Wrap
DOS Batch File
|
1980-01-06
|
2KB
|
101 lines
@echo off
if "%1"=="" goto :defcd
cd %1
:defcd
if exist t3tris.exe goto :isthere
echo File T3TRIS.EXE is not in specified directory
goto :end
:isthere
echo T3TRIS Menu
echo Choose one:
echo. 1 = one-player game
echo. 2 = two-player, competitive game
echo. 3 = two-player, cooperative game
ask3 "--> " 123
if errorlevel 3 goto :thr
if errorlevel 2 goto :two
if errorlevel 1 goto :one
goto :end
:one
ask3 "Music? [y/n] " yYnN
if errorlevel 3 goto :onenom
if errorlevel 1 goto :onemus
goto :end
:onemus
ask3 "Show next piece? [y/n] " yYnN
if errorlevel 3 goto :onemusnox
if errorlevel 1 goto :onemusnxt
goto :end
:onemusnxt
t3tris -1x
goto :end
:onemusnox
t3tris -1
goto :end
:onenom
ask3 "Show next piece? [y/n] " yYnN
if errorlevel 3 goto :onenomnox
if errorlevel 1 goto :onenomnxt
goto :end
:onenomnxt
t3tris -1nx
goto :end
:onenomnox
t3tris -1n
goto :end
:two
ask3 "Music? [y/n] " yYnN
if errorlevel 3 goto :twonom
if errorlevel 1 goto :twomus
goto :end
:twomus
ask3 "Show next piece? [y/n] " yYnN
if errorlevel 3 goto :twomusnox
if errorlevel 1 goto :twomusnxt
goto :end
:twomusnxt
t3tris -2x
goto :end
:twomusnox
t3tris -2
goto :end
:twonom
ask3 "Show next piece? [y/n] " yYnN
if errorlevel 3 goto :twonomnox
if errorlevel 1 goto :twonomnxt
goto :end
:twonomnxt
t3tris -2nx
goto :end
:twonomnox
t3tris -2n
goto :end
:thr
ask3 "Music? [y/n] " yYnN
if errorlevel 3 goto :thrnom
if errorlevel 1 goto :thrmus
goto :end
:thrmus
ask3 "Show next piece? [y/n] " yYnN
if errorlevel 3 goto :thrmusnox
if errorlevel 1 goto :thrmusnxt
goto :end
:thrmusnxt
t3tris -3x
goto :end
:thrmusnox
t3tris -3
goto :end
:thrnom
ask3 "Show next piece? [y/n] " yYnN
if errorlevel 3 goto :thrnomnox
if errorlevel 1 goto :thrnomnxt
goto :end
:thrnomnxt
t3tris -3nx
goto :end
:thrnomnox
t3tris -3n
goto :end
:end